object MainForm: TMainForm Left = 126 Top = 115 Width = 541 Height = 368 HelpContext = 5 HorzScrollBar.Position = 202 Caption = 'Sermon Library - Unregistered' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Pitch = fpVariable Font.Style = [] Icon.Data = {} KeyPreview = True Menu = MainMenu1 Position = poDefault ShowHint = True WindowState = wsMaximized OnClose = FormClose OnCreate = FormCreate OnKeyDown = FormKeyDown PixelsPerInch = 96 TextHeight = 16 object Panel2: TPanel Left = -202 Top = 312 Width = 785 Height = 235 Align = alBottom BevelOuter = bvNone BorderStyle = bsSingle Caption = 'Panel2' TabOrder = 0 object StatusBar1: TStatusBar Left = 0 Top = 212 Width = 781 Height = 19 Panels = < item Width = 250 end item Width = 50 end item Width = 50 end item Width = 50 end item Style = psOwnerDraw Width = 50 end item Alignment = taCenter Width = 190 end item Width = 60 end> SimplePanel = False SizeGrip = False end object DBGrid4: TDBGridRg Left = 0 Top = 0 Width = 781 Height = 212 Align = alClient DataSource = DataModule1.DataSource1 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Pitch = fpVariable Font.Style = [] Options = [dgTitles, dgIndicator, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit] ParentFont = False PopupMenu = RightClickMenu TabOrder = 1 TitleFont.Charset = DEFAULT_CHARSET TitleFont.Color = clNavy TitleFont.Height = -11 TitleFont.Name = 'Arial' TitleFont.Pitch = fpVariable TitleFont.Style = [fsBold] Columns = < item FieldName = 'Title' Width = 280 end item FieldName = 'Dates' Title.Caption = 'Date' end item FieldName = 'Series' Width = 230 end item FieldName = 'Theme' end> end end object GroupBoxComment: TGroupBox Left = 310 Top = 45 Width = 273 Height = 126 Caption = 'Notes' Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = -13 Font.Name = 'Arial' Font.Pitch = fpVariable Font.Style = [fsBold] ParentFont = False TabOrder = 1 object DBGrid3: TDBGrid Left = 2 Top = 18 Width = 269 Height = 106 Align = alClient DataSource = DataModule1.DataSource2 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -13 Font.Name = 'Arial' Font.Pitch = fpVariable Font.Style = [] Options = [dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit] ParentFont = False TabOrder = 0 TitleFont.Charset = DEFAULT_CHARSET TitleFont.Color = clNavy TitleFont.Height = -11 TitleFont.Name = 'Arial' TitleFont.Pitch = fpVariable TitleFont.Style = [fsItalic] Columns = < item FieldName = 'Date' Width = 55 end item FieldName = 'Comments' ReadOnly = True Width = 196 end> end end object GroupBoxResources: TGroupBox Left = 310 Top = 185 Width = 271 Height = 126 Caption = 'Additional Comments' Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = -13 Font.Name = 'Arial' Font.Pitch = fpVariable Font.Style = [fsBold] ParentFont = False TabOrder = 2 object DBMemo1: TDBMemo Left = 2 Top = 18 Width = 267 Height = 106 Align = alClient DataField = 'Comments' DataSource = DataModule1.DataSource1 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -13 Font.Name = 'Arial' Font.Pitch = fpVariable Font.Style = [] ParentFont = False ReadOnly = True TabOrder = 0 end end object GroupBoxOT: TGroupBox Left = 44 Top = 45 Width = 260 Height = 126 Caption = 'Old Testament Verses' Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = -13 Font.Name = 'Arial' Font.Pitch = fpVariable Font.Style = [fsBold] ParentFont = False TabOrder = 3 object DBGrid2: TDBGridRg Left = 2 Top = 18 Width = 256 Height = 106 Align = alClient DataSource = DataModule1.DataSource3 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -13 Font.Name = 'Arial' Font.Pitch = fpVariable Font.Style = [] Options = [dgTitles, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit] ParentFont = False TabOrder = 0 TitleFont.Charset = DEFAULT_CHARSET TitleFont.Color = clNavy TitleFont.Height = -11 TitleFont.Name = 'Arial' TitleFont.Pitch = fpVariable TitleFont.Style = [fsItalic] Columns = < item FieldName = 'OTBook' Title.Caption = 'Book' Width = 119 end item FieldName = 'OTChapterFrom' Title.Caption = 'Ch' end item FieldName = 'OTVerseFrom' Title.Caption = 'Vs' end item FieldName = 'To' Title.Caption = 'to' end item FieldName = 'OTChapterTo' Title.Caption = 'Ch' end item FieldName = 'OTVerseTo' Title.Caption = 'Vs' Width = 25 end> end end object GroupBoxNT: TGroupBox Left = 45 Top = 185 Width = 260 Height = 126 Caption = 'New Testament Verses' Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = -13 Font.Name = 'Arial' Font.Pitch = fpVariable Font.Style = [fsBold] ParentFont = False TabOrder = 4 object DBGrid1: TDBGridRg Left = 2 Top = 18 Width = 256 Height = 106 Align = alClient DataSource = DataModule1.DataSource4 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -13 Font.Name = 'Arial' Font.Pitch = fpVariable Font.Style = [] Options = [dgTitles, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit] ParentFont = False TabOrder = 0 TitleFont.Charset = DEFAULT_CHARSET TitleFont.Color = clNavy TitleFont.Height = -11 TitleFont.Name = 'Arial' TitleFont.Pitch = fpVariable TitleFont.Style = [fsItalic] Columns = < item FieldName = 'NTBook' Title.Caption = 'Book' Width = 119 end item FieldName = 'NTChapterFrom' Title.Caption = 'Ch' end item FieldName = 'NTVerseFrom' Title.Caption = 'Vs' end item FieldName = 'To' Title.Caption = 'to' end item FieldName = 'NTChapterTo' Title.Caption = 'Ch' end item FieldName = 'NTVerseTo' Title.Caption = 'Vs' Width = 25 end> end object DeleteOT: TDBEdit Left = 184 Top = 21 Width = 121 Height = 24 DataField = 'Title' TabOrder = 1 Visible = False end object DeleteComment: TDBEdit Left = 195 Top = 45 Width = 121 Height = 24 DataField = 'Title' TabOrder = 2 Visible = False end end object DetailPanel: TPanel Left = -200 Top = 52 Width = 237 Height = 260 HelpContext = 5 BevelInner = bvRaised BevelOuter = bvLowered TabOrder = 5 object TitleLabel: TLabel Left = 7 Top = 16 Width = 24 Height = 16 Caption = 'Title' Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = -13 Font.Name = 'Arial' Font.Pitch = fpVariable Font.Style = [] ParentFont = False end object DateLabel: TLabel Left = 7 Top = 57 Width = 27 Height = 16 Caption = 'Date' Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = -13 Font.Name = 'Arial' Font.Pitch = fpVariable Font.Style = [] ParentFont = False end object SeriesLabel: TLabel Left = 7 Top = 98 Width = 37 Height = 16 Caption = 'Series' Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = -13 Font.Name = 'Arial' Font.Pitch = fpVariable Font.Style = [] ParentFont = False end object ThemeLabel: TLabel Left = 7 Top = 138 Width = 39 Height = 16 Caption = 'Theme' Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = -13 Font.Name = 'Arial' Font.Pitch = fpVariable Font.Style = [] ParentFont = False end object FileLabel: TLabel Left = 7 Top = 179 Width = 53 Height = 16 Caption = 'Filename' Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = -13 Font.Name = 'Arial' Font.Pitch = fpVariable Font.Style = [] ParentFont = False end object TitleEdit: TDBEdit Left = 63 Top = 15 Width = 159 Height = 24 HelpContext = 5 DataField = 'Title' DataSource = DataModule1.DataSource1 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -13 Font.Name = 'Arial' Font.Pitch = fpVariable Font.Style = [] ParentFont = False ReadOnly = True TabOrder = 0 end object SeriesEdit: TDBEdit Left = 63 Top = 98 Width = 159 Height = 24 DataField = 'Series' DataSource = DataModule1.DataSource1 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -13 Font.Name = 'Arial' Font.Pitch = fpVariable Font.Style = [] ParentFont = False ReadOnly = True TabOrder = 1 end object ThemeEdit: TDBEdit Left = 63 Top = 139 Width = 88 Height = 24 DataField = 'Theme' DataSource = DataModule1.DataSource1 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -13 Font.Name = 'Arial' Font.Pitch = fpVariable Font.Style = [] ParentFont = False ReadOnly = True TabOrder = 2 end object FileEdit: TDBEdit Left = 63 Top = 180 Width = 159 Height = 24 DataField = 'FileName' DataSource = DataModule1.DataSource1 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -13 Font.Name = 'Arial' Font.Pitch = fpVariable Font.Style = [] ParentFont = False ReadOnly = True TabOrder = 3 end object DateEdit: TDBEdit Left = 63 Top = 56 Width = 68 Height = 24 HelpContext = 5 DataField = 'Dates' DataSource = DataModule1.DataSource1 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -13 Font.Name = 'Arial' Font.Pitch = fpVariable Font.Style = [] ParentFont = False ReadOnly = True TabOrder = 4 end object Panel1: TPanel Left = 2 Top = 227 Width = 233 Height = 31 Align = alBottom BevelInner = bvRaised BevelOuter = bvLowered Caption = 'Panel1' TabOrder = 5 object MyDBNavigator971: TMyDBNavigator97 Left = 2 Top = 2 Width = 229 Height = 27 Align = alClient Enabled = True ConfirmDelete = True VisibleButtons = [nbFirst97, nbPrior97, nbNext97, nbLast97, nbDelete97, nbCancel97, nbRefresh97] Hints.Strings = ( 'First Record' 'Previous Record' 'Next Record' 'Last Record' 'Insert a Record' 'Delete Current Record' 'Edit Current Record' 'Accept Changes' 'Cancel Changes' 'Refresh Data' 'Bookmark') GlyphFirst.Data = { 66010000424D6601000000000000760000002800000014000000140000000100 040000000000F000000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 8888888800008888888888888888888800008888888888888888888800008888 8888888888888888000088888888888888888888000088888888888888888888 0000888880888888880888880000888880888888000888880000888880888800 0008888800008888808800000008888800008888808888000008888800008888 8088888800088888000088888088888888088888000088888888888888888888 0000888888888888888888880000888888888888888888880000888888888888 8888888800008888888888888888888800008888888888888888888800008888 88888888888888880000} GlyphPrior.Data = { 66010000424D6601000000000000760000002800000014000000140000000100 040000000000F000000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 8888888800008888888888888888888800008888888888888888888800008888 8888888888888888000088888888888888888888000088888888888888888888 0000888888888888088888880000888888888800088888880000888888880000 0888888800008888880000000888888800008888888800000888888800008888 8888880008888888000088888888888808888888000088888888888888888888 0000888888888888888888880000888888888888888888880000888888888888 8888888800008888888888888888888800008888888888888888888800008888 88888888888888880000} GlyphNext.Data = { 66010000424D6601000000000000760000002800000014000000140000000100 040000000000F000000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 8888888800008888888888888888888800008888888888888888888800008888 8888888888888888000088888888888888888888000088888888888888888888 0000888888088888888888880000888888000888888888880000888888000008 8888888800008888880000000888888800008888880000088888888800008888 8800088888888888000088888808888888888888000088888888888888888888 0000888888888888888888880000888888888888888888880000888888888888 8888888800008888888888888888888800008888888888888888888800008888 88888888888888880000} GlyphLast.Data = { 66010000424D6601000000000000760000002800000014000000140000000100 040000000000F000000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 8888888800008888888888888888888800008888888888888888888800008888 8888888888888888000088888888888888888888000088888888888888888888 0000888880888888880888880000888880008888880888880000888880000088 8808888800008888800000008808888800008888800000888808888800008888 8000888888088888000088888088888888088888000088888888888888888888 0000888888888888888888880000888888888888888888880000888888888888 8888888800008888888888888888888800008888888888888888888800008888 88888888888888880000} GlyphInsert.Data = { 66010000424D6601000000000000760000002800000014000000140000000100 040000000000F000000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 8888888800008888888888888888888800008888888888888888888800008888 8888888888888888000088888888888888888888000088888888000888888888 0000888888880008888888880000888888880008888888880000888880000000 0088888800008888800000000088888800008888800000000088888800008888 8888000888888888000088888888000888888888000088888888000888888888 0000888888888888888888880000888888888888888888880000888888888888 8888888800008888888888888888888800008888888888888888888800008888 88888888888888880000} GlyphDelete.Data = { 66010000424D6601000000000000760000002800000014000000140000000100 040000000000F000000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 8888888800008888888888888888888800008888888888888888888800008888 8888888888888888000088888888888888888888000088888888888888888888 0000888888888888888888880000888888888888888888880000888880000000 0008888800008888800000000008888800008888800000000008888800008888 8888888888888888000088888888888888888888000088888888888888888888 0000888888888888888888880000888888888888888888880000888888888888 8888888800008888888888888888888800008888888888888888888800008888 88888888888888880000} GlyphEdit.Data = { 66010000424D6601000000000000760000002800000014000000140000000100 040000000000F000000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 8888888800008888888888888888888800008888888888888888888800008888 8888888888888888000088888888888888888888000088888888888888888888 0000888888888888888888880000888888888888888888880000888880000000 0008888800008888880000000088888800008888888000000888888800008888 8888000088888888000088888888800888888888000088888888888888888888 0000888888888888888888880000888888888888888888880000888888888888 8888888800008888888888888888888800008888888888888888888800008888 88888888888888880000} GlyphPost.Data = { 66010000424D6601000000000000760000002800000014000000140000000100 040000000000F000000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 8888888800008888888888888888888800008888888888888888888800008888 8888888888888888000088888888888888888888000088888888888888888888 0000888888808888888888880000888888000888888888880000888880000088 8888888800008888000800088888888800008888008880008888888800008888 8888880008888888000088888888888000888888000088888888888800088888 0000888888888888800888880000888888888888888888880000888888888888 8888888800008888888888888888888800008888888888888888888800008888 88888888888888880000} GlyphCancel.Data = { 66010000424D6601000000000000760000002800000014000000140000000100 040000000000F000000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 8888888800008888888888888888888800008888888888888888888800008888 8888888888888888000088888888888888888888000088888008888800888888 0000888880008880008888880000888888000800088888880000888888800000 8888888800008888888800088888888800008888888000008888888800008888 8800080008888888000088888000888000888888000088888008888800888888 0000888888888888888888880000888888888888888888880000888888888888 8888888800008888888888888888888800008888888888888888888800008888 88888888888888880000} GlyphRefresh.Data = { 66010000424D6601000000000000760000002800000014000000140000000100 040000000000F000000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 8888888800008888888888888888888800008888888888888888888800008888 8888888888888888000088888888888888888888000088888888808888888888 0000888888800888888888880000888888008888888888880000888888088888 8888888800008888800888888888888800008888800888000008888800008888 8008888800088888000088888800888000088888000088888800000008088888 0000888888880008880888880000888888888888888888880000888888888888 8888888800008888888888888888888800008888888888888888888800008888 88888888888888880000} GlyphBookmark.Data = { 66010000424D6601000000000000760000002800000014000000140000000100 040000000000F000000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 8888888800008888888888888888888800008888888888888888888800008888 8888888888888888000088888888888888888888000088888888888800088888 0000888888888880000888880000888888888800000888880000888888888000 0088888800008888888800000888888800008888888000008888888800008888 8800000888888888000088888010008888888888000088880111088888888888 0000888880108888888888880000888888088888888888880000888888888888 8888888800008888888888888888888800008888888888888888888800008888 88888888888888880000} NumGlyphsFirst = 1 NumGlyphsPrior = 1 NumGlyphsNext = 1 NumGlyphsLast = 1 NumGlyphsInsert = 1 NumGlyphsDelete = 1 NumGlyphsEdit = 1 NumGlyphsPost = 1 NumGlyphsCancel = 1 NumGlyphsRefresh = 1 NumGlyphsBookmark = 1 end end end object Panel5: TPanel Left = -193 Top = 319 Width = 790 Height = 10 Caption = 'Panel4' TabOrder = 6 Visible = False end object Dock971: TDock97 Left = -202 Top = 0 Width = 785 Height = 41 AllowDrag = False BoundLines = [blTop, blBottom] object Label3D1: TLabel3D Left = 598 Top = 5 Width = 134 Height = 23 Caption = 'Sermon Library' Font.Charset = ANSI_CHARSET Font.Color = clBlue Font.Height = -19 Font.Name = 'Arial' Font.Pitch = fpVariable Font.Style = [fsItalic] ParentFont = False ShadowColor = clSilver end object Toolbar971: TToolbar97 Left = 0 Top = 0 Width = 563 Height = 39 Caption = 'Toolbar971' DefaultDock = Dock971 DockedTo = Dock971 DockPos = 0 object ToolOpen: TToolbarButton97 Left = 2 Top = 2 Width = 61 Height = 35 Hint = 'View message' DisplayMode = dmGlyphOnly Caption = 'Launch' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial' Font.Pitch = fpVariable Font.Style = [] Glyph.Data = { 66010000424D6601000000000000760000002800000014000000140000000100 040000000000F000000000000000000000001000000010000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF00AC96800000FFFF00FF000000FF00FF00FFFF0000FFFFFF00AAAAAAAAAAAA AAAAAAAA0000AAAAAAAAAAAAAAAAAAAA0000AAAAAAAAAAAAAAAAAAAA0000AAA0 0000000000000AAA0000AAA00BFBFBBFBFBF0AAA0000AAA070BFBFFBFBFBF0AA 0000AAA0B0FBFBBFBFBFB0AA0000AAA070BFBFFBFBFBF0AA0000AAA0B70BFBBF BFBFBF0A0000AAA07B0FBFFBFBFBFB0A0000AAA0B70000000000000A0000AAA0 7B7B7BAEA0B080AA0000AAA000B7BA0AEA0800AA0000AAAAAA000AA0AEA0A0AA 0000AAAAAAAAAAAA0AEAE0AA0000AAAAAAAAAAAAA0AEA0AA0000AAAAAAAAAAAA 0AEAE0AA0000AAAAAAAAAAA0000000AA0000AAAAAAAAAAAAAAAAAAAA0000AAAA AAAAAAAAAAAAAAAA0000} Layout = blGlyphTop ParentFont = False OnClick = ToolLaunchClick end object ToolPrint: TToolbarButton97 Left = 63 Top = 2 Width = 60 Height = 35 Hint = 'Print message' DisplayMode = dmGlyphOnly Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial' Font.Pitch = fpVariable Font.Style = [] Glyph.Data = { 4E010000424D4E01000000000000760000002800000012000000120000000100 040000000000D800000000000000000000001000000010000000000000000000 BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD DDDDDD000000DDD00000000000DDDD000000DD0777777777070DDD000000D000 000000000070DD000000D0777777FFF77000DD000000D077777799977070DD00 0000D0000000000000770D000000D0777777777707070D000000DD0000000000 70700D000000DDD0FFFFFFFF07070D000000DDDD0FCCCCCF0000DD000000DDDD 0FFFFFFFF0DDDD000000DDDDD0FCCCCCF0DDDD000000DDDDD0FFFFFFFF0DDD00 0000DDDDDD000000000DDD000000DDDDDDDDDDDDDDDDDD000000DDDDDDDDDDDD DDDDDD000000DDDDDDDDDDDDDDDDDD000000} Layout = blGlyphTop ParentFont = False OnClick = ToolPrintClick end object ToolSearch: TToolbarButton97 Left = 255 Top = 2 Width = 60 Height = 35 Hint = 'Search...' DisplayMode = dmGlyphOnly DropdownMenu = SearchPopupMenu Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial' Font.Pitch = fpVariable Font.Style = [] Glyph.Data = { 66010000424D6601000000000000760000002800000014000000140000000100 040000000000F000000000000000000000001000000010000000000000000000 80000080000000808000800000008000800080800000AC968000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 7777777700007777777777777777777700007700000444444000007700007007 7700FBFB00777007000000F7F7700FB00F7F770000000F7F7F770000F7F7F770 000007FFF7F700007FFF7F7000000FFFFF770000FFFFF770000000FFF7F00000 0FFF7F000000700F7F00000000F7F00700007700000003300000007700007777 4B00000000F47777000077774FBFB00FBFB47777000077774BFBFBF444447777 000077774FBFBFB4FB477777000077774BFBFBF4B4777777000077774FBFBFB4 4777777700007777444444447777777700007777777777777777777700007777 77777777777777770000} Layout = blGlyphTop ParentFont = False end object ToolSort: TToolbarButton97 Left = 315 Top = 2 Width = 60 Height = 35 Hint = 'Sort...' DisplayMode = dmGlyphOnly DropdownMenu = PopupSort Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial' Font.Pitch = fpVariable Font.Style = [] Glyph.Data = { 66010000424D6601000000000000760000002800000014000000140000000100 040000000000F000000000000000000000001000000010000000000000000000 8000008000000080800080000000800080008080000080808000AC9680000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 8888888800008888888878888000008800008888888807888008888800008888 8777007888008888000088887000000788800888000088870FFF00F888880088 00008870F8880F8880000088000088078888F888888888880000880788888888 88888888000088F077777777777778880000888F000000000000078800008888 FFFFFFFFFFFFF078000088888888888888888708000080088800888878888708 0000800888008887088887080000880000088870077770880000880080088F00 0000088800008880008888F00FFFF888000088870788888F0888888800008888 88888888888888880000} Layout = blGlyphTop ParentFont = False end object ToolAdd: TToolbarButton97 Left = 129 Top = 2 Width = 60 Height = 35 Hint = 'Add a new sermon record' DisplayMode = dmGlyphOnly DropdownMenu = PopupMenuAdd Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial' Font.Pitch = fpVariable Font.Style = [] Glyph.Data = { 66010000424D6601000000000000760000002800000014000000140000000100 040000000000F000000000000000000000001000000010000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00AC968000FFFFFF00EEEEEEEEEEEE EEEEEEEE0000EEEEEEEEEEEEEEEEEEEE0000EEEE77777777EEEEEEEE0000EE00 000000007EEEEEEE0000EE0BFFFBFFF0777777EE0000EE0F444444F00000007E 0000EE0FFBFFFBF0FBFFF07E0000EE0F444444F04444F07E0000EE0BFFFBFFF0 FFFBF07E0000EE0F444444F04444F07E0000EE0FFBFFFBF0FBFFF07E0000EE0F 44F000004477F07E0000EE0BFFF0FFF0FF00077E0000EE0F44F0FB00F70A077E 0000EE0FFBF0F0FF000A000E0000EE0000000F470AAAAA0E0000EEEEEEEE0FFB 000A000E0000EEEEEEEE0000770A0EEE0000EEEEEEEEEEEEEE000EEE0000EEEE EEEEEEEEEEEEEEEE0000} Layout = blGlyphTop ParentFont = False end object ToolEdit: TToolbarButton97 Left = 189 Top = 2 Width = 60 Height = 35 Hint = 'Edit Sermon Records' DisplayMode = dmGlyphOnly DropdownMenu = PopmenuEdit Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial' Font.Pitch = fpVariable Font.Style = [] Glyph.Data = { 66010000424D6601000000000000760000002800000014000000140000000100 040000000000F000000000000000000000001000000010000000000000000000 BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000AC9680000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 888888880000888888888888888888880000880000000000000088880000880F FFFFFFFFFFF088880000880FCCFFCCCCCFF088880000880FFFFFFFFFFFF08888 0000880FCCFFCCCCCFF088880000880FCCFFCCCCCFF088880000880FFFFFFFFF FFF088880000880FFFFFFFF0FFF088880000880F00FFFF0B0FF088800000880F 0F00F0B0F00008000000880FF0BB0B0F0FFBF000000088000000F0F0FBBFBF00 000088000000F0F0FBBFBF000000888888880B0FBFFBFB0000008888888880FB FBBFB00000008888888888000000080000008888888888888888888800008888 88888888888888880000} Layout = blGlyphTop ParentFont = False end object ToolDelete: TToolbarButton97 Left = 375 Top = 2 Width = 60 Height = 35 Hint = 'Delete Current Record' DisplayMode = dmGlyphOnly Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial' Font.Pitch = fpVariable Font.Style = [] Glyph.Data = { 66010000424D6601000000000000760000002800000014000000140000000100 040000000000F000000000000000000000001000000010000000000000000000 BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000 FF004000800000FFFF00FF000000FF00FF00AC968000FFFFFF00EEEEEEEEEEEE EEEEEEEE0000EEEEEEEEEEEEEEEEEEEE0000EEEEEE000000000EEEEE0000EEEE E0BB040B0440EEEE0000EEEEE0BB040B0440EEEE0000EEEEE0BB040B0440EEEE 0000EEEEE0BB040B0440EEEE0000EEEEE0BB040B0440EEEE0000EEEEE0BB040B 0440EEEE0000EEEEE0BB040B0440EEEE0000EEEEE0BB040B0440EEEE0000EEEE E0BB040B0440EEEE0000EEEEE0BB040B0440EEEE0000EEEEE0BB040B0440EEEE 0000EEEEE0BB040B0440EEEE0000EEEE0000000000000EEE0000EEEE0AAAAAAA AAAA0EEE0000EEEEE00000000000EEEE0000EEEEEEEEE000EEEEEEEE0000EEEE EEEEEEEEEEEEEEEE0000} Layout = blGlyphTop ParentFont = False OnClick = ToolDeleteClick end object ToolHelp: TToolbarButton97 Left = 441 Top = 2 Width = 60 Height = 35 Hint = 'Get help...' DisplayMode = dmGlyphOnly DropdownMenu = PopupMenuHelp Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial' Font.Pitch = fpVariable Font.Style = [] Glyph.Data = { 66010000424D6601000000000000760000002800000014000000140000000100 040000000000F000000000000000000000001000000010000000000000000000 8000008000000080800080000000800080008080000080808000AC9680000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 8888888800008888888888888888888800008888888887778888888800008888 8888600788888888000088888888E60788888888000088888888EE6888888888 000088888888877788888888000088888888600788888888000088888888E607 78888888000088888888E660778888880000888888888E660778888800008888 888878E660778888000088888880778E660788880000888888660778E6078888 0000888888E66077E608888800008888888E660066688888000088888888E666 6E8888880000888888888EEEE888888800008888888888888888888800008888 88888888888888880000} Layout = blGlyphTop ParentFont = False end object ToolExit: TToolbarButton97 Left = 501 Top = 2 Width = 60 Height = 35 Hint = 'Exit' DisplayMode = dmGlyphOnly Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Arial' Font.Pitch = fpVariable Font.Style = [] Glyph.Data = { 66010000424D6601000000000000760000002800000014000000140000000100 040000000000F00000000000000000000000100000001000000000000000AC96 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00111111111111 1111111100001160111000111111111100001F860000660011111111000010F8 6066FF66011111110000110F860000F86011111100001100F860660F86011111 000011080F860660F86011110000108800F806660F860111000010F606006666 60F86011000010F606666666660F60110000110F60F6F6666660F6010000110F 808F8F660060F60100001110F0F8F8F086008601000011F06FFFFF80F8600011 0000111FFFFFF0F80F860011000011F8FFF6060000F860110000111F8FF0FF66 880F860100001111F1F000FFF000F861000011111111110001110F1100001111 11111111111111110000} Layout = blGlyphTop ParentFont = False OnClick = Exit1Click end object ToolbarSep971: TToolbarSep97 Left = 123 Top = 2 Width = 6 Height = 35 end object ToolbarSep972: TToolbarSep97 Left = 249 Top = 2 Width = 6 Height = 35 end object ToolbarSep973: TToolbarSep97 Left = 435 Top = 2 Width = 6 Height = 35 end end end object DeleteNT: TDBEdit Left = 78 Top = 195 Width = 121 Height = 24 DataField = 'Title' TabOrder = 8 Visible = False end object PopupSort: TPopupMenu HelpContext = 230 Left = 62 Top = 17 object Title: TMenuItem Caption = 'Title' ShortCut = 113 OnClick = TitleClick end object Date: TMenuItem Caption = 'Date' ShortCut = 114 OnClick = DateClick end object Series: TMenuItem Caption = 'Series' HelpContext = 1010 ShortCut = 115 OnClick = SeriesClick end object Theme: TMenuItem Caption = 'Theme' ShortCut = 116 OnClick = ThemeClick end end object PopupMenuAdd: TPopupMenu Left = 138 Top = 20 object Record1: TMenuItem Caption = 'Sermon Details' OnClick = Record1Click end object Notes1: TMenuItem Caption = 'Notes' OnClick = Note1Click end object OldTestamentReference1: TMenuItem Caption = 'Old Testament Reference' OnClick = OldTestamentReference1Click end object NewTestamentReference1: TMenuItem Caption = 'New Testament Reference' OnClick = NewTestamentReference1Click end object Comments2: TMenuItem Caption = 'Comments' OnClick = Comments2Click end end object PopmenuEdit: TPopupMenu Left = 211 Top = 19 object Record2: TMenuItem Caption = 'Sermon Details' OnClick = Record2Click end object Comments1: TMenuItem Caption = 'Notes' OnClick = Comments1Click end object OldTestament1: TMenuItem Caption = 'Old Testament Reference' OnClick = OldTestament1Click end object NewTestament1: TMenuItem Caption = 'New Testament Reference' OnClick = NewTestament1Click end object Comments3: TMenuItem Caption = 'Comments' OnClick = Comment end end object PopupMenuHelp: TPopupMenu Left = 192 Top = 14 object Contents2: TMenuItem Caption = 'Contents' HelpContext = 1000 ShortCut = 112 OnClick = Contents2Click end object N3: TMenuItem Caption = '-' end object Register2: TMenuItem Caption = 'Register' OnClick = Register2Click end object N4: TMenuItem Caption = '-' end object AboutSermonLibrary1: TMenuItem Caption = 'About Sermon Library' OnClick = AboutSermonLibrary1Click end end object IceLock1: tIceLock IceString1 = 'Sermon Library 1.0' IceString2 = 'LegacyofLove' IceSeed1 = 220866 IceSeed2 = 70893 ProgramKey1 = -1003667799 ProgramKey2 = 655074924 KeyFile = 'REGISTER.KEY' TrialDays = 60 DemoLicense = True Left = 540 Top = 22 end object NagScreen1: TNagScreen ProductName = 'Sermon Library' Version = 'Version 2.3' CopyRight = '(c) 1998 Legacy of Love Software' Comments = 'Please feel free to evaluate Sermon Library for 30 days. If you ' + 'continue to use Sermon Library, your registering your copy will ' + 'help support our community ministry. To register your copy of Se' + 'rmon Library please see the online help.' Author = 'Legacy of Love Software' Address = 'PO Box 259' CityStateZip = 'Corrimal NSW 2518, Australia' Title = 'Community Support Computing' Left = 356 Top = 13 end object MainMenu1: TMainMenu Left = 3 Top = 22 object File1: TMenuItem Caption = '&File' object OpenSermon1: TMenuItem Caption = 'Open &Sermon' OnClick = ToolLaunchClick end object PrintRecord1: TMenuItem Caption = '&Print Record' OnClick = PrintRecord1Click end object N2: TMenuItem Caption = '-' end object Backup1: TMenuItem Caption = '&Backup' HelpContext = 470 OnClick = Backup1Click end object Restore1: TMenuItem Caption = '&Restore' HelpContext = 470 OnClick = Restore1Click end object N1: TMenuItem Caption = '-' end object Exit1: TMenuItem Caption = 'E&xit' OnClick = Exit1Click end end object Edit1: TMenuItem Caption = '&Edit' object Add1: TMenuItem Caption = '&Add a record' object Record3: TMenuItem Caption = 'Sermon Details' OnClick = Record3Click end object Note1: TMenuItem Caption = 'Note' OnClick = Note1Click end object OldTestamentReference2: TMenuItem Caption = 'Old Testament Reference' OnClick = OldTestamentReference1Click end object NewTestamentReference2: TMenuItem Caption = 'New Testament Reference' OnClick = NewTestamentReference1Click end object Comment3: TMenuItem Caption = 'Comment' OnClick = Comments1Click end end object N7: TMenuItem Caption = '-' end object Edit2: TMenuItem Caption = 'E&dit existing records' object Record4: TMenuItem Caption = 'Sermon Details' OnClick = Record2Click end object Note2: TMenuItem Caption = 'Notes' OnClick = Comments1Click end object OldTestamentReference3: TMenuItem Caption = 'Old Testament Reference' OnClick = OldTestament1Click end object NewTestamentReference3: TMenuItem Caption = 'New Testament Reference' OnClick = NewTestament1Click end object Comment2: TMenuItem Caption = 'Comment' OnClick = Comment end end end object Tools1: TMenuItem Caption = '&Tools' object Search1: TMenuItem Caption = '&Search' object MainSearch2: TMenuItem Caption = 'Main Search' OnClick = MainSearch1Click end object NewTestament3: TMenuItem Caption = 'New Testament' OnClick = NewTestament2Click end object OldTestament3: TMenuItem Caption = 'Old Testament' OnClick = OldTestament2Click end object DatedNote1: TMenuItem Caption = 'Notes' OnClick = Notes2Click end end object N8: TMenuItem Caption = '-' end object Sort1: TMenuItem Caption = 'Sor&t' object Theme1: TMenuItem Caption = 'Title' ShortCut = 113 OnClick = TitleClick end object Date1: TMenuItem Caption = 'Date' ShortCut = 114 OnClick = DateClick end object Series1: TMenuItem Caption = 'Series' ShortCut = 115 OnClick = SeriesClick end object Theme2: TMenuItem Caption = 'Theme' ShortCut = 116 OnClick = ThemeClick end end object N9: TMenuItem Caption = '-' end object DeleteRecord1: TMenuItem Caption = '&Delete Record' OnClick = ToolDeleteClick end end object Help1: TMenuItem Caption = '&Help' object Contents1: TMenuItem Caption = '&Contents' OnClick = Contents1Click end object N5: TMenuItem Caption = '-' end object Register1: TMenuItem Caption = '&Register' OnClick = Register1Click end object N6: TMenuItem Caption = '-' end object AboutSermonLibrary2: TMenuItem Caption = '&About Sermon Library' OnClick = AboutSermonLibrary2Click end end end object Timer1: TTimer OnTimer = Timer1Timer Left = 61 Top = 281 end object RightClickMenu: TPopupMenu Left = 178 Top = 47 object Add2: TMenuItem Caption = 'Add' OnClick = Record1Click end object Edit3: TMenuItem Caption = 'Edit' OnClick = Record2Click end object Search2: TMenuItem Caption = 'Search' OnClick = FindaSermon1Click end object Sort2: TMenuItem Caption = 'Sort' object Title1: TMenuItem Caption = 'Title' OnClick = TitleClick end object Date2: TMenuItem Caption = 'Date' OnClick = DateClick end object Series2: TMenuItem Caption = 'Series' OnClick = SeriesClick end object Theme3: TMenuItem Caption = 'Theme' OnClick = ThemeClick end end object Delete1: TMenuItem Caption = 'Delete' OnClick = ToolDeleteClick end object OPen1: TMenuItem Caption = 'Open' OnClick = ToolLaunchClick end object Print1: TMenuItem Caption = 'Print' OnClick = ToolPrintClick end end object Timer2: TTimer OnTimer = Timer2Timer Left = 458 Top = 21 end object ZipMaster1: TZipMaster Verbose = False Trace = False AddCompLevel = 9 AddOptions = [] ExtrOptions = [ExtrOverWrite] ZipFilename = 'backup.zip' Left = 179 Top = 112 end object SearchPopupMenu: TPopupMenu Left = 273 Top = 39 object MainSearch1: TMenuItem Caption = 'Main Search' OnClick = MainSearch1Click end object NewTestament2: TMenuItem Caption = 'New Testament' OnClick = NewTestament2Click end object OldTestament2: TMenuItem Caption = 'Old Testament' OnClick = OldTestament2Click end object Notes2: TMenuItem Caption = 'Notes' OnClick = Notes2Click end end end